perm filename G1[KID,KMC] blob sn#122900 filedate 1974-11-15 generic text, type T, neo UTF8
TITLE G1
;DATA FOR GAME 1 (LETTERS).
INTERNAL GAMNAM,ALFBET,DIRECT,GAMENO
GAMNAM:	SIXBIT	/GAME1/
GAMENO:	000100000000		;GAME NUMBER FOR HISTORY FILE

DIRECT:	BLOCK	=261		;ALLOW FOR 130 PIX IN GAME1.DPY

MIALTS ← 0

ALFBET:				;TABLE OF ADDRESSES FOR I/P CHARS.
	XWD	0,0		;000,001
	XWD	0,0		;002,003
	XWD	0,0		;004,005
	XWD	0,0		;006,007
	XWD	0,TBALTS	;010,011
	XWD	0,0		;012,013
	XWD	0,CRALTS	;014,015
	XWD	0,0		;016,017
	XWD	0,0		;020,021
	XWD	0,0		;022,023
	XWD	0,0		;024,025
	XWD	0,0		;026,027
	XWD	0,0		;030,031
	XWD	0,0		;032,033
	XWD	0,0		;034,035
	XWD	0,0		;036,037
	XWD	SPALTS,0	;040,041
	XWD	0,0		;042,043
	XWD	0,0		;044,045
	XWD	0,0		;046,047
	XWD	LPALTS,RPALTS	;050,051
	XWD	0,PLALTS	;052,053
	XWD	COALTS,MIALTS	;054,055
	XWD	PEALTS,0	;056,057
	XWD	N0ALTS,N1ALTS	;060,061
	XWD	N2ALTS,N3ALTS	;062,063
	XWD	N4ALTS,N5ALTS	;064,065
	XWD	N6ALTS,N7ALTS	;066,067
	XWD	N8ALTS,N9ALTS	;070,071
	XWD	0,SCALTS	;072,073
	XWD	0,0		;074,075
	XWD	0,0		;076,077
	XWD	0,AALTS		;100,101
	XWD	BALTS,CALTS	;102,103
	XWD	DALTS,EALTS	;104,105
	XWD	FALTS,GALTS	;106,107
	XWD	HALTS,IALTS	;110,111
	XWD	JALTS,KALTS	;112,113
	XWD	LALTS,MALTS	;114,115
	XWD	NALTS,OALTS	;116,117
	XWD	PALTS,QALTS	;120,121
	XWD	RALTS,SALTS	;122,123
	XWD	TALTS,UALTS	;124,125
	XWD	VALTS,WALTS	;126,127
	XWD	XALTS,YALTS	;130,131
	XWD	ZALTS,0		;132,133
	XWD	0,0		;134,135
	XWD	0,BSALTS	;136,137

AALTS:	3	;LIST OF ALTERNATIVES CORRESPONDING TO A.
	AALT1
	AALT2
	AALT3
BALTS:	3	;LIST OF ALTERNATIVES CORRESPONDING TO B.
	BALT1
	BALT2
	BALT3
CALTS:	3	;LIST OF ALTERNATIVES CORRESPONDING TO C.
	CALT1
	CALT2
	CALT3
DALTS:	3	;LIST OF ALTERNATIVES CORRESPONDING TO D.
	DALT1
	DALT2
	DALT3
EALTS:	3	;LIST OF ALTERNATIVES CORRESPONDING TO E.
	EALT1
	EALT2
	EALT3
FALTS:	3	;LIST OF ALTERNATIVES CORRESPONDING TO F.
	FALT1
	FALT2
	FALT3
GALTS:	3	;LIST OF ALTERNATIVES CORRESPONDING TO G.
	GALT1
	GALT2
	GALT3
HALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO H.
	HALT1
	HALT2
IALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO I.
	IALT1
	IALT2
JALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO J.
	JALT1
	JALT2
KALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO K.
	KALT1
	KALT2
LALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO L.
	LALT1
	LALT2
MALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO M.
	MALT1
	MALT2
NALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO N.
	NALT1
	NALT2
OALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO O.
	OALT1
	OALT2
PALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO P.
	PALT1
	PALT2
QALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO Q.
	QALT1
	QALT2
RALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO R.
	RALT1
	RALT2
SALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO S.
	SALT1
	SALT2
TALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO T.
	TALT1
	TALT2
UALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO U.
	UALT1
	UALT2
VALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO V.
	VALT1
	VALT2
WALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO W.
	WALT1
	WALT2
XALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO X.
	XALT1
	XALT2
YALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO Y.
	YALT1
	YALT2
ZALTS:	2	;LIST OF ALTERNATIVES CORRESPONDING TO Z.
	ZALT1
	ZALT2
N0ALTS:	1	;LIST OF ALTERNATIVES CORRESPONDING TO 0.
	N0ALT1
N1ALTS:	1	;LIST OF ALTERNATIVES CORRESPONDING TO 1.
	N1ALT1
N2ALTS:	1	;LIST OF ALTERNATIVES CORRESPONDING TO 2.
	N2ALT1
N3ALTS:	1	;LIST OF ALTERNATIVES CORRESPONDING TO 3.
	N3ALT1
N4ALTS:	1	;LIST OF ALTERNATIVES CORRESPONDING TO 4.
	N4ALT1
N5ALTS:	1	;LIST OF ALTERNATIVES CORRESPONDING TO 5.
	N5ALT1
N6ALTS:	1	;LIST OF ALTERNATIVES CORRESPONDING TO 6.
	N6ALT1
N7ALTS:	1	;LIST OF ALTERNATIVES CORRESPONDING TO 7.
	N7ALT1
N8ALTS:	1	;LIST OF ALTERNATIVES CORRESPONDING TO 8.
	N8ALT1
N9ALTS:	1	;LIST OF ALTERNATIVES CORRESPONDING TO 9.
	N9ALT1
PLALTS:	1		;PLUS
	PLALT1
LPALTS:	1		;LPAREN.
	LPALT1
RPALTS:	1		;RPAREN.
	RPALT1
CRALTS:	1		;CARRIAGE RETURN.
	CRALT1
SCALTS:	1		;SEMICOLON.
	SCALT1
PEALTS:	1		;PERIOD.
	PEALT1
COALTS:	1		;COMMA.
	COALT1
SPALTS:	1		;SPACE.
	SPALT1
BSALTS:	1		;BACKSPACE.
	BSALT1
TBALTS:	1		;TAB.
	TBALT1

AALT1:	SIXBIT	/AA11/
	SIXBIT	/JA1/
AALT2:	SIXBIT	/AA21/
	SIXBIT	/JA1/
AALT3:	SIXBIT	/AAA1/
	SIXBIT	/AAB1/
	SIXBIT	/AAC1/
	SIXBIT	/AAD1/
	SIXBIT	/AAE1/
	SIXBIT	/AAF1/
	SIXBIT	/AAG1/
	SIXBIT	/AAH1/
	SIXBIT	/AAI1/
	SIXBIT	/AAJ1/
	SIXBIT	/AAK1/
	SIXBIT	/AAL1/
	SIXBIT	/AAM1/
	SIXBIT	/JA1/
BALT1:	SIXBIT	/AB11/
	SIXBIT	/JB1/
BALT2:	SIXBIT	/AB21/
	SIXBIT	/JB1/
BALT3:	SIXBIT	/ABA1/
	SIXBIT	/ABB1/
	SIXBIT	/ABC1/
	SIXBIT	/ABD1/
	SIXBIT	/ABE1/
	SIXBIT	/ABF1/
	SIXBIT	/ABG1/
	SIXBIT	/ABH1/
	SIXBIT	/ABI1/
	SIXBIT	/ABJ1/
	SIXBIT	/ABK1/
	SIXBIT	/ABL1/
	SIXBIT	/JB1/
CALT1:	SIXBIT	/AC11/
	SIXBIT	/JC1/
CALT2:	SIXBIT	/AC21/
	SIXBIT	/JC1/
CALT3:	SIXBIT	/ACA1/
	SIXBIT	/ACB1/
	SIXBIT	/ACC1/
	SIXBIT	/ACD1/
	SIXBIT	/ACE1/
	SIXBIT	/ACF1/
	SIXBIT	/ACG1/
	SIXBIT	/ACH1/
	SIXBIT	/ACI1/
	SIXBIT	/ACJ1/
	SIXBIT	/ACK1/
	SIXBIT	/ACL1/
	SIXBIT	/ACM1/
	SIXBIT	/ACN1/
	SIXBIT	/ACO1/
	SIXBIT	/ACP1/
	SIXBIT	/ACQ1/
	SIXBIT	/ACR1/
	SIXBIT	/ACS1/
	SIXBIT	/ACT1/
	SIXBIT	/JC1/
DALT1:	SIXBIT	/AD11/
	SIXBIT	/JD1/
DALT2:	SIXBIT	/AD21/
	SIXBIT	/JD1/
DALT3:	SIXBIT	/AD31/
	SIXBIT	/JD1/
EALT1:	SIXBIT	/AE11/
	SIXBIT	/JE1/
EALT2:	SIXBIT	/AE21/
	SIXBIT	/JE1/
EALT3:	SIXBIT	/AE31/
	SIXBIT	/JE1/
FALT1:	SIXBIT	/AF11/
	SIXBIT	/JF1/
FALT2:	SIXBIT	/AF21/
	SIXBIT	/JF1/
FALT3:	SIXBIT	/AF31/
	SIXBIT	/JF1/
GALT1:	SIXBIT	/AG11/
	SIXBIT	/JG1/
GALT2:	SIXBIT	/AG21/
	SIXBIT	/JG1/
GALT3:	SIXBIT	/AG31/
	SIXBIT	/JG1/
HALT1:	SIXBIT	/AH11/
	SIXBIT	/JH1/
HALT2:	SIXBIT	/AH31/
	SIXBIT	/JH1/
IALT1:	SIXBIT	/AI11/
	SIXBIT	/JI1/
IALT2:	SIXBIT	/AI31/
	SIXBIT	/JI1/
JALT1:	SIXBIT	/AJ11/
	SIXBIT	/JJ1/
JALT2:	SIXBIT	/AJ31/
	SIXBIT	/JJ1/
KALT1:	SIXBIT	/AK11/
	SIXBIT	/JK1/
KALT2:	SIXBIT	/AK31/
	SIXBIT	/JK1/
LALT1:	SIXBIT	/AL11/
	SIXBIT	/JL1/
LALT2:	SIXBIT	/AL31/
	SIXBIT	/JL1/
MALT1:	SIXBIT	/AM11/
	SIXBIT	/JM1/
MALT2:	SIXBIT	/AM31/
	SIXBIT	/JM1/
NALT1:	SIXBIT	/AN11/
	SIXBIT	/JN1/
NALT2:	SIXBIT	/AN31/
	SIXBIT	/JN1/
OALT1:	SIXBIT	/AO11/
	SIXBIT	/JO1/
OALT2:	SIXBIT	/AO31/
	SIXBIT	/JO1/
PALT1:	SIXBIT	/AP11/
	SIXBIT	/JP1/
PALT2:	SIXBIT	/AP31/
	SIXBIT	/JP1/
QALT1:	SIXBIT	/AQ11/
	SIXBIT	/JQ1/
QALT2:	SIXBIT	/AQ31/
	SIXBIT	/JQ1/
RALT1:	SIXBIT	/AR11/
	SIXBIT	/JR1/
RALT2:	SIXBIT	/AR31/
	SIXBIT	/JR1/
SALT1:	SIXBIT	/AS11/
	SIXBIT	/JS1/
SALT2:	SIXBIT	/AS31/
	SIXBIT	/JS1/
TALT1:	SIXBIT	/AT11/
	SIXBIT	/JT1/
TALT2:	SIXBIT	/AT31/
	SIXBIT	/JT1/
UALT1:	SIXBIT	/AU11/
	SIXBIT	/JU1/
UALT2:	SIXBIT	/AU31/
	SIXBIT	/JU1/
VALT1:	SIXBIT	/AV11/
	SIXBIT	/JV1/
VALT2:	SIXBIT	/AV31/
	SIXBIT	/JV1/
WALT1:	SIXBIT	/AW11/
	SIXBIT	/JW1/
WALT2:	SIXBIT	/AW31/
	SIXBIT	/JW1/
XALT1:	SIXBIT	/AX11/
	SIXBIT	/JX1/
XALT2:	SIXBIT	/AX31/
	SIXBIT	/JX1/
YALT1:	SIXBIT	/AY11/
	SIXBIT	/JY1/
YALT2:	SIXBIT	/AY31/
	SIXBIT	/JY1/
ZALT1:	SIXBIT	/AZ11/
	SIXBIT	/JZ1/
ZALT2:	SIXBIT	/AZ31/
	SIXBIT	/JZ1/

N0ALT1:	SIXBIT	/ANUM01/
	SIXBIT	/JN01/
N1ALT1:	SIXBIT	/ANUM11/
	SIXBIT	/JN11/
N2ALT1:	SIXBIT	/ANUM21/
	SIXBIT	/JN21/
N3ALT1:	SIXBIT	/ANUM31/
	SIXBIT	/JN31/
N4ALT1:	SIXBIT	/ANUM41/
	SIXBIT	/JN41/
N5ALT1:	SIXBIT	/ANUM51/
	SIXBIT	/JN51/
N6ALT1:	SIXBIT	/ANUM61/
	SIXBIT	/JN61/
N7ALT1:	SIXBIT	/ANUM71/
	SIXBIT	/JN71/
N8ALT1:	SIXBIT	/ANUM81/
	SIXBIT	/JN81/
N9ALT1:	SIXBIT	/ANUM91/
	SIXBIT	/JN91/

PLALT1:	<SIXBIT	/D/>+.+2
	SIXBIT	/JXPLS1/
	SIXBIT	/XPLS11/
LPALT1:	SIXBIT	/AXLP11/
	SIXBIT	/JXLP1/
RPALT1:	SIXBIT	/AXRP11/
	SIXBIT	/JXRP1/
CRALT1:	SIXBIT	/AXCR11/
	SIXBIT	/JXCR1/
SCALT1:	<SIXBIT	/D/>+.+2
	SIXBIT	/JXSMI1/
	SIXBIT	/XSMI11/
PEALT1:	<SIXBIT	/D/>+.+2
	SIXBIT	/JXPER1/
	SIXBIT	/XPER11/
COALT1:	<SIXBIT	/D/>+.+2
	SIXBIT	/JXCOM1/
	SIXBIT	/XCOM11/
SPALT1:	SIXBIT	/AXSP11/
	SIXBIT	/JXSP1/
BSALT1:	<SIXBIT	/D/>+.+2
	SIXBIT	/JXBSP1/
	SIXBIT	/XBSP11/
TBALT1:	<SIXBIT	/D/>+.+2
	SIXBIT	/JXTAB1/
	SIXBIT	/XTAB11/

END